Top 10k strings from MicroHobby Semanal - Issue 041-044 (1985)(Hobby Press)(es)(Side B).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
7 ;"PARE LA CINTA": 5 (X1,Y1)=41 4 px2,py2;" ": 4 px1,py1;" ": 4 VIDAS=VIDAS-1 4 VIDAS-PANT.-RECORD-PUNTOS-TIEMPO 4 ;I;"/";J;" ": 4 (X1,Y1)=170 4 3 CRONONES<239 3 ;"********************************": 2 T(X,Y)=T(I,J)+1 2 R$=" ELIJA OPCION PULSANDO SU NUMERO CORRESPONDIENTE" 2 PXI+PXD+PYI+PYD=3 2 PUNTOS=PUNTOS+70 2 PANTALLA=PANTALLA+1 2 PANTALLA=0 2 LINEA=LINEA+50 2 J<LI)-((J-1 2 IY+J,IX+I;: 2 IY+J,IX+I;" 2 I<CO)-((I-1 2 CRONONES=CRONONES+1 2 COCO=COCO+1 2 B(CRONONES+1 2 A(CRONONES+1 2 ;"POR: ";Q$ 2 ;"CRIA "; 2 ;" CRONONES: ";CRONONES;" " 2 ;" " 2 (px2,py2-1 2 (px2,py2+1 2 (px1,py1-1 2 (px1,py1+1 2 (NPROG/DOS) 2 '" COPYUPI 2 "22",CERO;B$: 2 : ";NP;" "; 1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 x,y;" "; 1 tx,ty;" " 1 s$="ooooooooooooooooo ooooooooooo": 1 res=res+36 1 py,px;" ": 1 px2,py2;o$ 1 px1,py1;p$; 1 ny,px;" ": 1 moviiemto bichos 1 micro 1 fi,zi;" "; 1 f$=f$+" ": 1 combate=combate+1 1 cargador \ 1 cara b ! 1 buhos muertos 1 bo=po+1000 1 VIDAS:";vi;" 1 UNO;"PONGA EN MARCHA LA CINTA"; 1 Tortuga 1 TZX por Manuel Gomez Amate 1 TIBURONES: NATACION Y REPRODUCCION 1 TECLADO Y MOVIMIENTOS 1 TABLA TIBURONES 1 SPACE-UNO,X1 1 SPACE-UNO,CERO: 1 SPACE,LINEA: 1 SPACE,CERO: 1 SALIDA DE OCEANO 1 REPRESENTACION PECES Y TIBURONES 1 REPRESENTACION PECES 1 REPRESENTACION ESCUALOS 1 R$=R$+" INVESTIGACION Y CIENCIA FEBRERO 1985" 1 R$="Una vez en marcha la guerra ecologica el programa facilita modificar los parametros: PCRIA, TCRIA y AYUNO.Asimismo, pulsando 'F' se podra salir del oceano para ir al MENU de opciones.Los peces se representan con 1 R$="Si la edad de un tiburon alcanzacuando menos la de TCRIA, se engendra un nuevo tiburon, como ocurre con los peces.Pero los tiburones no pueden vivir sin comer, asi, cuando un tiburon ha ayunado un numero determinado de cronones (AYUNO),morira y desaparecera.Al principio la edad de cada pezy tiburon estara aleatoriamente comprendida entre 0 y sus res- pectivas edades de reproduccion." 1 R$="Los habitantes de ACUA-TOR se desplazan en sentido vertical y horizontal (nunca en diagonal).La vida del pez consiste en nadar aleatoriamente y reprodu- cirse cada PCRIA cronones, pero solo cuando las cuatro casillas adyacentes no esten ocupadas.Al reproducirse dejara en su anterior posicion a su cria y tomaran ambos la edad 0." 1 R$="La vida para los tiburones es mas compleja, devoraran siempre que tengan un pez en alguna casilla adyacente (lo elegiran al azar si hubiera mas de uno) yocuparan su lugar.Cuando no hay peces adyacentes, los tiburones se mueven igual que los peces." 1 R$="H A B I T A N T E S": 1 R$="ACUA-TOR es el juego de la vida con peces y tiburones.ACUA-TOR es un mundo acuatico con forma de toroide en el que los peces se reproducen y los tiburones los devoran o mueren.El tiempo en ACUA-TOR pasa a intervalos discretos: CRONONES, cada cronon equivale a un ciclo de vida." 1 R$="ACUA-TOR en tu Spectrum consisteen un oceano rectangular cuadri-culado, cuyos lados opuestos estan identificados dos a dos, es decir, si un pez o tiburon optara por salirse del oceano apareceria en el correspondientelugar del borde opuesto.El rectangulo de nuestro oceano es de 10 filas por 16 columnas." 1 R$=" TCRIA: ": 1 R$=" PCRIA: ": 1 R$=" AYUNO: ": 1 R$=" PULSA 'R' PARA REPETIR LA INTRODUCCION, CUALQUIER OTRA PARA COMENZAR." 1 R$=" PULSA CUALQUIER TECLA PARA CONTINUAR": 1 R$=" PULSA CUALQUIER TECLA PARA VOLVER AL MENU": 1 R$=" ELIJA OPCION PULSANDO SU NUMERO CORRESPONDIENTE": 1 R$=" 1 Q$="XXXX": 1 PXI+PXD+PYI+PYD=4 1 PXI+PXD+PYI+PYD 1 PUNTOS:";po; 1 PRESENTACION DE PANTALLAS 1 PO,PI;C$(N): 1 PECES:NATACION Y REPRODUCCION 1 PANTALLA-4 1 PANTALLA-1- 1 PANTALLA 2 1 PANT.PECES 1 PANATALLA-3 1 P(X,Y)=P(I,J)+1 1 P(I,J)=P(I,J)+1 1 OPCION INIC. 1 MOVIMIENTO AL AZAR 1 MODIFICACIONES PARA PCRIA,TCRIA,AYUNO 1 LISTA POSICIONES OCUPA. ADYACENTES POR PECES O TIBURONES 1 LISTA PECES Y TIBURONES ADYACENTES A TIBURONES 1 Kung-fu 1 INSTRUCIONES 1 IMPRESION DE SALTOS 1 I,CERO;,,: 1 I(X,Y)=I(I,J)+1 1 Hobby Press 1 GRAFICOS Y CARGA C/M 1 GRAFICO PECES " 1 GRAF.PECES 1 FIN DEL JUEGO 1 FICHEROS 1 F;"!ERES EL MEJOR DE LOS AVIADORES!": 1 ENTRADA DATOS PARA MODIFICACIONES 1 DOS=UNO+UNO 1 Cosecha 1 Copyupi l 1 Castellano 1 CUADRICULA ACUA-TOR 1 CUADRICULA 1 CRONONES=-1 1 COPYUPI N 1 COPYCODE 1 COMIENZO RUTINA C/M TRANSLADO PANTALLA A ARCHIVO Y VICEVERSA. DIR:58455 COMIENZO ARCHIVO 1 COLORES PANTALLA 1 COLOR PANT 1 CINTA 11 CARA B 1 CERO;" "; 1 C=CRONONES 1 C$="ESTE PROGRAMA SE AUTODESTRUIRA EN POCOS SEGUNDOS... ESPERO QUE LO HAYAS PASADO BIEN !!CON EL LADRON!!" 1 C$=" Por favor, elija un programa " 1 Buho ( 1 Binky 1 B$=" " 1 Atracador 1 Acua-tor MP 1 ASIGN.VAR. 1 ="L")-(378 1 ;e;"o. CAMPEONATO DE ";o$ 1 ;V$(VIDAS); 1 ;PANTALLA; 1 ;"v.-38A-L"; 1 ;"Zean Hjorth-Degenkolv"; 1 ;"ZX-ZX-ZX" 1 ;"Z= IZQUIERDA"; 1 ;"X= DERECHA"; 1 ;"W= NEW"; 1 ;"VIDAS:";vi;" 1 ;"Usted controla un super avion llamado ~BINKI~ que esta dotado de disparos laser y equipado con bombas X7." 1 ;"Tercera pantalla"; 1 ;"Tenga cuidado con el ~FUEL~ que bajara lentamente.Cuando haya destruido la ciudad tendra que aterrizar." 1 ;"TU TURNO !!!!" 1 ;"TU TIEMPO FUE DE:";ti 1 ;"TIME=0"; 1 ;"TE LO HA PARADO!": 1 ;"TE LO HA PARADO ": 1 ;"TE HAS METIDO EN LA FINAL CON :": 1 ;"TE HA DADO !!!! ": 1 ;"TCRIA: ";TCRIA;" "; 1 ;"TCRIA: ";TCRIA; 1 ;"Su objetivo es destruir toda la ciudad y eliminar a todos los aviones de combate que haya." 1 ;"Spectrum": 1 ;"Sinclair": 1 ;"Segunda pantalla"; 1 ;"SI QUIRES DESPEGAR BIEN PULSA Q": 1 ;"SE TE ACABARON LAS VIDAS" 1 ;"SE ESTAN DEFINIENDO LOS GRAFICOS" 1 ;"SE ACABO" 1 ;"RESERVAS=";res; 1 ;"REPRESENTANDO PECES EN PANTALLA ";#0 1 ;"RECORD TIME=";re 1 ;"RECORD TIME= ";ti; 1 ;"RECORD TIME= ";re 1 ;"Quieres volver a intentarlo ?" 1 ;"Que grado ?" 1 ;"QUIRES JUGAR OTRA VEZ?": 1 ;"Q= EMPEZAR"; 1 ;"Pulsa una tecla": 1 ;"Primera pantalla"; 1 ;"Pero tu no sabras si la patada o punetazo son diestros o siniestros asi que tambien jugara la suerte." 1 ;"PUNTOS:"; 1 ;"PULSE S PARA JUGAR O N PARA PARAR" 1 ;"PULSE CUALQUIER TECLA." 1 ;"PULSA UNA TECLA PARA EMPEZAR": 1 ;"PERO OJO.TE HA TOCADO EN ESTOS CUARTOS DE FINAL A": 1 ;"PCRIA: ";PCRIA;" "; 1 ;"PCRIA: ";PCRIA; 1 ;"PASASTE DE ELIMINATORIA" 1 ;"PARA EMPEZAR PULSA UNA TECLA": 1 ;"P= SUBIR"; 1 ;"OPCIONES:"; 1 ;"OH,ES UNA LASTIMA !!"; 1 ;"NUEVO RECORD:";re 1 ;"NTIB.: ";NT: 1 ;"NPECES: ";NP: 1 ;"NOMBRE FICHERO (10 CARAC.MAX.): "; 1 ;"MUY BIEN !!!": 1 ;"LO HAS PARADO !!": 1 ;"LLEGASTE A SEMIFINALES CON :": 1 ;"LING-CHU": 1 ;"JOSE ARIAS"; 1 ;"JOSE , ARTURO & MICROHOBY" 1 ;"Introduce:" 1 ;"Hong-kong"; 1 ;"HAS PASADO DE SEMIFINALES !!!": 1 ;"HA SIDO ELIMINADO POR EL TANTEO DE :"; 1 ;"Ganara el que llegue primero a 10 puntos en ataque.Comenzara atacando el ordenador." 1 ;"FUEL: 0" 1 ;"FIN TIB." 1 ;"FIN PECES" 1 ;"El ordenador nos lanzara,o bien un punetazo,o bien una patada. Ante ello hemos de defendernos introduciendo por el teclado:" 1 ;"El juego simula un combate entreel ordenador y tu." 1 ;"El ataque seguira la misma meca nica.Se ataca con 1,2,3 o 4.": 1 ;"ESPERA UNOS SEGUNDOS" 1 ;"ENHORABUENA!!! PASATE DE OCTAVOSDE FINAL !!!": 1 ;"Deseas instrucciones?" 1 ;"Derecha.....P Izquierda...O Arriba......Q Abajo.......A Disparar....(solo pantalla 1)..M"; 1 ;"DESEAS JUGAR OTRA? ";A$ 1 ;"DESEAS JUGAR OTRA VEZ ? ";A$ 1 ;"DESEA CONTINUAR SIN TIB. ? ("; 1 ;"DESEA CONTINUAR SIN PECES? ("; 1 ;"Categ."; 1 ;"CONTROLES:" 1 ;"CONTROL:"; 1 ;"CAMPEONATO DE ARTES MARCIALES" 1 ;"C R O N O N E S": 1 ;"BUHOS= 3"; 1 ;"BUENO,PERO AL MENOS TE HAN SUBENCIONADO EL BILLETE DE VUELTA EN SEGUNDA CATEGORIA." 1 ;"BRUCE LEE": 1 ;"Al principio podras introducir la modalidad y la edicion": 1 ;"AYUNO: ";AYUNO;" " 1 ;"AYUNO: ";AYUNO 1 ;"ASI QUE TE HAS PROCLAMADO CAMPEON DEL ";e;" CAMPEONATO DE ";o$: 1 ;"ARTURO COBAS"; 1 ;"3. VOLVER AL MENU PRINCIPAL": 1 ;"3-4....punos(iz.-der.)" 1 ;"2. GRAFICO LINEAL"; 1 ;"19-II-85"; 1 ;"1. GRAFICO DE BARRAS"; 1 ;"1-2..patadas(iz.-der.)": 1 ;"-TIEMPO: ";tm: 1 ;"-TIEMPO: "; 1 ;"-TE COMISTE LAS 20 FRUTAS-" 1 ;"-PUNTUACION: ";pt: 1 ;"-PUNT.: " 1 ;"-NUEVA PARTIDA POR HACERLO CON UN TIEMPO MENOR a 200.": 1 ;"-Modalidad" 1 ;"-LLEGO LA 1 ;"-HAY QUE RECOGER LAS 48 FRUTAS " 1 ;"-FALLOS: ";a1: 1 ;"-Edicion": 1 ;"*RAPIDEZ: ";r 1 ;"*PUNTUACION: ";pt; 1 ;"*FRUTA RECOGIDA: ";p;" 1 ;"*** LA COSECHA ***"; 1 ;") " 1 ;") ": 1 ;"'F':SALIR"; 1 ;"'F' ACTIVADA,ESPERE FIN DE CICLO": 1 ;"& MICROHOBBY"; 1 ;"#########PULSA UNA TECLA########" 1 ;"""THE JET""": 1 ;"!HAS COSECHADO LOS 12 ARBOLES!"; 1 ;"!!PREPARATE PARA DESPEGAR!!"; 1 ;"!!PREPARATE PARA ATERRIZAR!!" 1 ;"!!FRACASASTE EN EL ATERRIZAJE!!" 1 ;"!!!HAS FRACASADO EN TU MISION!!!" 1 ;"!!! ATACAS TU!!!": 1 ;" UN MOMENTO POR FAVOR " 1 ;" TIBURONES: CAZA Y REPRODUCCION "; 1 ;" SI ERROR EN CARGA: 1 ;" SI ERROR EN CARGA: 1 ;" REPRESENTANDO TIB. EN PANTALLA " 1 ;" REPRESENTANDO PANTALLA INICIAL ";#0 1 ;" QUIERE COMENZAR ? ("; 1 ;" PULSA UNA TECLA": 1 ;" PECES: NATACION Y REPRODUCCION "; 1 ;" OPCION: "; 1 ;" MODIFICA PARAMETROS ? ("; 1 ;" MAX.MEMORIA GRAF.: 238 CRONONES" 1 ;" LE HAS DADO !!!": 1 ;" DESEA INTRODUCCION ? ("; 1 ;" BUHO ": 1 ;" Tienes que atravesar esta zona de canguros y avestruces sin que te cojan.Necesitas mas de 1000 puntos. Por cada tortuga que que pases son 100 puntos PULSA UNA TECLA": 1 ;" POR JOSE ARIAS Y ARTURO COBAS" 1 ;" OTRA MODIFICACION ? ("; 1 ;" No tienes laser,tienes que conseguir mas de 650 puntos para pasar esta pantalla los tanteos son los mismos las PASTILLAS..50 puntos CUIDADO con los PERROS PULSA UNA TECLA": 1 ;" Los LOROS te persiguen tu solo puedes matarlos con tu laser cuando estan a la derecha apuntando al CUELLO. 1 ;" KUNG-FU" 1 ;" C A R G A C O R R E C T A ": 1 ;" !ENHORABUENA: HAS OBTENIDO LA MAXIMA PUNTUACION!" 1 ;" LE DISTE!!! ": 1 ;" EL PROGRAMA SERA DESTRUIDO. CONTINUO ? ("; 1 ;" MANDOS:"; 1 ;" El ladron tiene una arries- da mision para el mundo del mal Ha de robar los tres bancos de cada ciudad, en su viaje reco- rrera varias ciudades, al robar los bancos de una ciudad tendra que ir a la agencia de viajes para recoger el billete que hay reservado para el. !!!QUE LA MALDAZ TE ACOMPANE!!!" 1 ;" TURNO:-> " 1 ;" TURNO-> ": 1 ;" TORTUGA"; 1 ;" ...AVISO... SOLO TIENES 5 LASER PERO POR CADA LORO QUE MATES TE DARAN UNO. PULSA UNA TECLA": 1 ;" "; 1 ;" " 1 ;" "; 1 ;" "''" ": 1 ;" "; 1 ;" ": 1 ;" " 1 : ";a1;" FALLOS": 1 1985 ####### 1 ......DISPARAR"; 1 ......BOMBAS" 1 ......ARRIBA"; 1 ......ABAJO"; 1 ,PUNTOS-(256 1 ,D.L.: M-36598-84 1 , y los tiburones con 1 ************* 1 *** graficos definidos por el usuario *** 1 *** CINTA-MICROHOBBY *** 1 (tx,ty)=62 1 (VALOR)<"A" 1 (PUNTOS/256 1 ''"1 TIPO ",: 1 ''" OPCIONES:"''" 1. GRAFICA DE POBLACION"''" 2. CONTINUAR ACUA-TOR"''" 3. COMENZAR ACUA-TOR"''" 4. SAVE ACUA-TOR ACTUAL"''" 5. LOAD FICHERO ACUA-TOR"''" 6. SALIDA DEL PROGRAMA" 1 '"Operacion correcta": 1 '"Lo siento, no cabe" 1 '"Error en la seleccion": 1 '"Error de carga" 1 #######El Ladron 1 "program"'': 1 "prog/d()/d$()/byt (0/1/2/3) ";z: 1 "matriz num"'': 1 "matriz alfa"'': 1 "bytes"'': 1 "Variables (hasta 65535) ";l: 1 "Tu nombre : ";A$ 1 "TU NOMBRE ? ";Q$: 1 "RAPIDEZ?(1 a 5)1:RAP.-5:LENTO ";r: 1 "Nuevo nombre (max 10) ";f$: 1 "Nuevo flag (hasta 255) ";l: 1 "No. de tiburones ? (1-";(NT);"): "; 1 "No. de peces ? (1-159): "; 1 "NOMBRE FICHERO (10 CARAC.MAX.): "; 1 "MicroHobby Semanal numeros 41 a 44 1 "Longitud (hasta 65279) ";l: 1 "Elija la funcion "; 1 "Elija (1/2/3/4/5/6 o 0) ";u: 1 "El Ladron" 1 "E-Acua-tor","F-Copyupi","G-Cosecha","H-Atracador" 1 "Cuantos cronones pueden ayunar los tiburones ?(AYUNO): "; 1 "Comienzo (hasta 65535) ";l: 1 "Cada cuantos cronones engendro un tiburon ?(TCRIA): "; 1 "Cada cuantos cronones engendro un pez ?(PCRIA): "; 1 "COPYCODE" 1 "A-Buho","B-Binky","C-Tortuga","D-Kung-fu" 1 "64"+NPROG) 1 "5";"cara: "; 1 "5";"Programa: "; 1 "5";"Programa inexistente": 1 "5";"'R' Vuelve al menu" 1 "5";"'L' Carga el programa"; 1 "5 VARIABLES", 1 "4 COMIENZO", 1 "32"-I;C$( 1 "3 LONGITUD", 1 "23539",l: 1 "23539"'''"V - volver al menu"''"C - cambiar datos": 1 "23538"''"6 TIPO DE FLAG", 1 "23537",l- 1 "23536"'': 1 "23535",l- 1 "23534"'': 1 "23533",l- 1 "23522",z: 1 "22",CERO;C$(I 1 "22",CERO;B$ 1 "22",CERO; 1 "2 NOMBRE",: 1 "1";"Elija la funcion (V/C)" 1 "-OTRA PARTIDA?:(Dar a ENTER).";C$ 1 "'''''" OPCIONES:"''''" 1. COMENZAR ACUA-TOR"''" 2. CARGAR ARCHIVO ACUA-TOR" 1 "'''"LN load normal","SN save normal"''"LE load esp","SE save esp"''"VN verify norm","VE verify esp"''"LC leer cab","LF leer flag"''"CC cambiar","FI final"''': 1 " GRAF. CUADRICULA " 1 " GRAFICO TIBURONES " 1 TEXTO INTRODUCCION 1 REPRESENTACION INICIAL 1 PULSE UNA TECLA PARA JUGAR 1 PULSE UNA TECLA 1 JUAN CARLOS FERNANDEZ ROMERO, ABRIL 1985" 1 JOSE MARIA CORTES 1985****" 1 INSTRUCCIONES 1 GRAFICOS 1 EXPLOSION 1 DE LOS 12 ARBOLES ROJOS." 1 ASIGNACION VARIABLES 1 : ";NT;#0 1 : ";NT;" "; 1 1985-artes marciales": 1 1985 MICROHOBBY"': 1 1985 MICROHOBBY 1 VARIABLES 1 TABLA PECES 1 SUBRUTINAS 2 1 SUBRUTINAS 1 1 INICIO 1 FIN DE LAS ESPECIES 1 DISPARO 1 DIBUJO GRAFICA 1 BARAJAS 1 AEROPUERTO DE 1 OPCION INICIAL 1 MENSAJES MOVILES 1 INICIALIZACION 1 CUERPO PROGRAMA 1 PRESENTACION 1 M E N U 1 INTRODUCCION 1 GRAFICO LINEAL 1 Por cada loro son: 50 puntos cada vez que bajes o subas menos 1 punto cuando vayas hacia los lados 1 punto. Para pasar a la siguiente pantalla necesitas mas de 250 puntos PULSA UNA TECLA": 1 1 1 1 1